home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / comms / other / novia / src / novia_reg_data.c < prev    next >
C/C++ Source or Header  |  1999-12-06  |  4KB  |  161 lines
  1. #ifndef MAKE_ID
  2. #define MAKE_ID(a,b,c,d) ((ULONG) (a)<<24 | (ULONG) (b)<<16 | (ULONG) (c)<<8 | (ULONG) (d))
  3. #endif
  4.  
  5. #ifdef _DCC
  6. #define __inline
  7. #endif
  8.  
  9. #include "novia_reg_data.h"
  10.  
  11. struct RegApp * CreateRegApp(void)
  12. {
  13.     struct RegApp * Object;
  14.  
  15.     APTR    GROUP_ROOT_0, GR_grp_28, LA_Reg_IDNumber, LA_Reg_Name, LA_Reg_Location;
  16.     APTR    LA_Reg_VoiceNo, LA_Reg_Modemno, LA_Reg_EMail, GR_grp_29, LA_label_25;
  17.  
  18.     if (!(Object = AllocVec(sizeof(struct RegApp), MEMF_PUBLIC|MEMF_CLEAR)))
  19.         return(NULL);
  20.  
  21.     Object->STR_TX_label_7 = "Welcome to\nNOViA V0.00.05, "__DATE__" "__TIME__"\n Please enter your Registration Number";
  22.  
  23.     Object->TX_label_7 = TextObject,
  24.         MUIA_Background, MUII_TextBack,
  25.         MUIA_Frame, MUIV_Frame_Text,
  26.         MUIA_Text_Contents, Object->STR_TX_label_7,
  27.     End;
  28.  
  29.     LA_Reg_IDNumber = Label("Registration Number");
  30.  
  31.     Object->STR_RegNumber = StringObject,
  32.         MUIA_Frame, MUIV_Frame_String,
  33.         MUIA_HelpNode, "STR_RegNumber",
  34.     End;
  35.  
  36.     LA_Reg_Name = Label("Your Name");
  37.  
  38.     Object->STR_Reg_Name = StringObject,
  39.         MUIA_Frame, MUIV_Frame_String,
  40.         MUIA_HelpNode, "STR_Reg_Name",
  41.     End;
  42.  
  43.     LA_Reg_Location = Label("Location");
  44.  
  45.     Object->STR_Reg_Location = StringObject,
  46.         MUIA_Frame, MUIV_Frame_String,
  47.         MUIA_HelpNode, "STR_Reg_Location",
  48.     End;
  49.  
  50.     LA_Reg_VoiceNo = Label("Your Voicenumber");
  51.  
  52.     Object->STR_Reg_Voicenumber = StringObject,
  53.         MUIA_Frame, MUIV_Frame_String,
  54.         MUIA_HelpNode, "STR_Reg_Voicenumber",
  55.         MUIA_String_Accept, "0123456789.",
  56.     End;
  57.  
  58.     LA_Reg_Modemno = Label("1. Modemline or Telnet-Address");
  59.  
  60.     Object->STR_Reg_Modem = StringObject,
  61.         MUIA_Frame, MUIV_Frame_String,
  62.         MUIA_HelpNode, "STR_Reg_Modem",
  63.         MUIA_String_Accept, "0123456789.+-",
  64.     End;
  65.  
  66.     LA_Reg_EMail = Label("Your EMail Address");
  67.  
  68.     Object->STR_Reg_EMail = StringObject,
  69.         MUIA_Frame, MUIV_Frame_String,
  70.         MUIA_HelpNode, "STR_Reg_EMail",
  71.     End;
  72.  
  73.     GR_grp_28 = GroupObject,
  74.         MUIA_HelpNode, "GR_grp_28",
  75.         MUIA_Frame, MUIV_Frame_Group,
  76.         MUIA_FrameTitle, "Your Registrarion Details",
  77.         MUIA_Group_Columns, 2,
  78.         Child, LA_Reg_IDNumber,
  79.         Child, Object->STR_RegNumber,
  80.         Child, LA_Reg_Name,
  81.         Child, Object->STR_Reg_Name,
  82.         Child, LA_Reg_Location,
  83.         Child, Object->STR_Reg_Location,
  84.         Child, LA_Reg_VoiceNo,
  85.         Child, Object->STR_Reg_Voicenumber,
  86.         Child, LA_Reg_Modemno,
  87.         Child, Object->STR_Reg_Modem,
  88.         Child, LA_Reg_EMail,
  89.         Child, Object->STR_Reg_EMail,
  90.     End;
  91.  
  92.     LA_label_25 = Label("Press Save, if you are finish");
  93.  
  94.     Object->BT_Reg_Save = SimpleButton("Save");
  95.  
  96.     GR_grp_29 = GroupObject,
  97.         MUIA_HelpNode, "GR_grp_29",
  98.         MUIA_Frame, MUIV_Frame_Group,
  99.         MUIA_Group_Horiz, TRUE,
  100.         Child, LA_label_25,
  101.         Child, Object->BT_Reg_Save,
  102.     End;
  103.  
  104.     GROUP_ROOT_0 = GroupObject,
  105.         Child, Object->TX_label_7,
  106.         Child, GR_grp_28,
  107.         Child, GR_grp_29,
  108.     End;
  109.  
  110.     Object->WI_label_0 = WindowObject,
  111.         MUIA_Window_Title, "NOViA REGiSTRATiON",
  112.         MUIA_Window_ID, MAKE_ID('0', 'W', 'I', 'N'),
  113.         WindowContents, GROUP_ROOT_0,
  114.     End;
  115.  
  116.     Object->App = ApplicationObject,
  117.         MUIA_Application_Author, "NONE",
  118.         MUIA_Application_Base, "NONE",
  119.         MUIA_Application_Title, "NONE",
  120.         MUIA_Application_Version, "$VER: NONE XX.XX (XX.XX.XX)",
  121.         MUIA_Application_Copyright, "NOBODY",
  122.         MUIA_Application_Description, "NONE",
  123. //        MUIA_HelpFile, "novia_client.guide",
  124.         SubWindow, Object->WI_label_0,
  125.     End;
  126.  
  127.  
  128.     if (!Object->App)
  129.     {
  130.         FreeVec(Object);
  131.         return(NULL);
  132.     }
  133.  
  134.     DoMethod(Object->WI_label_0,
  135.         MUIM_Window_SetCycleChain, Object->STR_RegNumber,
  136.         Object->STR_Reg_Name,
  137.         Object->STR_Reg_Location,
  138.         Object->STR_Reg_Voicenumber,
  139.         Object->STR_Reg_Modem,
  140.         Object->STR_Reg_EMail,
  141.         Object->BT_Reg_Save,
  142.         0
  143.         );
  144.  
  145.     set(Object->WI_label_0,
  146.         MUIA_Window_Open, TRUE
  147.         );
  148.  
  149.     DoMethod(Object->WI_label_0,    MUIM_Notify,MUIA_Window_CloseRequest, TRUE,Object->App,2,MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
  150.     DoMethod(Object->BT_Reg_Save,    MUIM_Notify,MUIA_Pressed, FALSE,Object->App,2,MUIM_Application_ReturnID, REGID_SAVE);
  151.  
  152.     return(Object);
  153. }
  154.  
  155. void DisposeRegApp(struct RegApp * Object)
  156. {
  157.     MUI_DisposeObject(Object->App);
  158.     FreeVec(Object);
  159. }
  160.  
  161.